home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (Latin America) Volume 1 #6 / CD-ROM Today 6 Latam.iso / referenc / dor / dordem.dxr / 00061.ls < prev    next >
Encoding:
Text File  |  1996-11-14  |  1.0 KB  |  50 lines
  1. on exitFrame
  2.   global gCurrTextpic, gMidEssayStage, gAcceptTextClix
  3.   puppetSprite(8, 1)
  4.   set the castNum of sprite 8 to 30
  5.   set the visible of sprite 8 to 1
  6.   updateStage()
  7.   set gAcceptTextClix to 0
  8.   if rollOver(8) then
  9.     cursor(-1)
  10.     set the movieRate of sprite 8 to 1
  11.   else
  12.     if rollOver(22) then
  13.       set the movieRate of sprite 8 to 0
  14.       cursor(-1)
  15.     else
  16.       if rollOver(23) then
  17.         set the movieRate of sprite 8 to 0
  18.         cursor(-1)
  19.       else
  20.         if rollOver(7) then
  21.           set the movieRate of sprite 8 to 0
  22.           if the puppet of sprite 7 = 1 then
  23.             cursor(-1)
  24.           else
  25.             navChk()
  26.           end if
  27.         else
  28.           navChk()
  29.         end if
  30.       end if
  31.     end if
  32.   end if
  33.   go(the frame)
  34. end
  35.  
  36. on navChk
  37.   global gAcceptTextClix, gMidEssayStage, gReadCheck
  38.   set the movieRate of sprite 8 to 0
  39.   set gAcceptTextClix to 1
  40.   if the mouseH > gMidEssayStage then
  41.     cursor([20, 340])
  42.   else
  43.     if gReadCheck = 1 then
  44.       cursor([21, 341])
  45.     else
  46.       cursor([20, 340])
  47.     end if
  48.   end if
  49. end
  50.